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2. ABSTRACT 

This package includes subroutines which allow the user to type characters on 
line represented by 1, 3, or a string of codes. Routines are included to facilitate formating 
by the user. The user must supply his own subroutine, OTY, to type out one Teletype character. 

3. REQUIREMENTS 

3.3 Equipment 

Teleprinter 

4. USAGE 

4.1 Loading 

The Teletype Output Package source tape should be assembled with the program 
which refers to it, orassembledusinga symbol punch which contains the required subroutine calls 
(see Digital-7-3-S). In either case, the operation of the routines are independent of their 
position in memory. The user must supply a type-out routine, OTY, which is referred to by 
the package (see below). 

4.2 Calling Sequence 

The following calling sequences may be used to call the Teletype output sub- 



routines. 



Format Routines 



TCR Type a carriage return and line feed. 

TSP Type a space. 

TYT Type a tab. Tab stops are located every TTAB spaces. This 

value is initially 10, but may be altered by the user. The subroutine counts the number of 
characters being printed on a line so that a TYT call will generate the proper number of spaces 
for a consistant format. TCR resets the character count to 0. 

TIN Initialize the teleprinter. Type a carriage return, line feed, 

lower case, and set the character count to 0. TIN should be called before any other subrou- 
tines in the package. 

Character Type-out Routines 

TDIGIT Type the digit (code value from to 9) in the right four bits of 
the AC, 
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TYl Type the character represented by the code in the right six bits 

of the AC . 

TY3 Type the three characters represented by the codes in left, middle, 

and right six bits of the AC, respectively. 

LAW A 

TSR Type the string of characters represented by the codes stored be- 

ginning in register A. A code having zeros in the leftmost five bits terminates the string. 

All characters are typed by calling the subroutine OTY, which must be defined 
by the user. Two sequences are suggested, one for use with programs which use program inter- 
rupt for I/O service, and one for programs which do not. 

NOTE: When using a Type 28 Teletype, TLS will type characters 
represented by 5-bit codes; when using a Type 33 Teletype, TLS 
will type from 8-bit codes. 

The following subroutine works very well with interrupt programs where buffering 
is not needed: 

OTY, 

TLS 
JMP. 
JMPIOTY 

TYINT, TCF 

ISZ 
DISMISS 

When using the associated program interrupt routine, an interrupt from the 
teleprinter should execute the command: 

JMP TYINT 

In addition, the symbol DjSMIS should be defined as a JMP to the section of 
the interrupt routine which restores the AC and link and dismisses the program interrupt. 

The following subroutine is suggested for noninterrupt programs: 

OTY 

TLS 
TSF 

JMP .-1 
JMP 1 OTY 
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6. 



DESCRIPTION 



6.1 



Discussion 



These routines assume that the codes which represent the characters to be typed 
consist of six bits. The leftmost five bits are the Baudot code for the character; the rightmost 
bit indicates the case of the character (1 for upper case, for lower case). This format is 
generated by the PDP-7 Assember's character input operations in Teletype mode (see 
Digital-7-3-S). The case of the Type 28 Teletype is automatically checked (and adjusted if 
necessary) when each character is typed. A code whose leftmost five bits are is not printed 

When using a PDP-7 with KSR33 teleprinter, the 5-bit Teletype codes are trans- 
lated to 8- bit Type 33 codes (ASCII plus 200) before printing. Case shifts on the KSR33 are 
nonexistent. References to case in this document may be ignored when using the KSR33. 

WARNING 



When using a Type 28 Teletype the routine keeps track of keyboard 
case and assumes it knows the case at all times. However, if the 
user is also using the keyboard for input, he may change the case 
without the routines knowing it, possibly causing hash at the next 
type-out. For this reason and also for convenience, it is suggested 
that the user keep track of case by using the same indicators the 
package uses. 

The contents of the register OCS indicates the case of the tele- 
printer, 33q for upper case and 37^ for lower case. If this is 
changed whenever a case shift is typed upon input, no problems 
of this type will be encountered. 
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PROGRAM 


10.4 


Program Listing 




PDP-7 BTA 



/TELETYPE OUTPUT PACKAGE 8-13-63 

XIT=t:AC-JMS TTAB»10 

/TYPE 1 CHARACTER FROM AC BITS 12-1? 



F»I3F» 
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DAC TY-^SVAC 






RAR 




JMS TYIA 




XIT TYl 




TYEXIT 


/TYPE 1 


CHARACTER (5 BIT), T.TNK INDICATES CASE 


TYIA, 







DAC T->EMY 




AND (37 




SNA 




JMP TY2 




703301 




SKP 




JMP TYIB 




LAC OCL 




SZL 




LAC OCU 




SAD OCS 




JMP . 3 




JMS OTY 




DAC OCS 




LAC TEMY 




JMS OTY 




ISZ T^BC 


TY2, 


LAC TEMY 




JMP I TYIA 


/TYPE 3 CHARACTERS FROM AC 0-5. 6-11, 12-17 RESPECTIVELY 


TY3=JMS 


• 









DAC TYSVAC 




JMS RL6 




JMS TYIA 




JMS RL6 




JMS TYIA 




JMS RT/6 




JMS TYIA 




XIT TY3 




TYEXIT 


/TELETYPE OUTPACKAGE PAGE 2 


/TYPE A 


CARRIAGE RETURN, AND LINE PKKl) 


TCR«JMS 


• 









DAC TYSVAC 




703301 




SKP 




JMP TCRA 




LAW 2 




JMS OTY 



£31313 
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LAW 10 






JMS OTY 






DZM TBC 






XIT TCR 






TYEXIT 




/TYPE A SPACE 




TSP^JMS . 




DAC TYSVAC 

LAW 4 

703301 

SKP 

LAW 240 

JMS OTY 

ISZ TBC 

XIT TSP 

TYEXIT 




/TYPE A TABULATION 




TYT- JMS . 




DAC TYSVAC 
LAC TBC 
ADD (1 
TAD (-TTAB 










SMA 






JMP .-2 






TAD (-1 






DAC TEMYl 






LAC TYSVAC 






TSP 






ISZ TEMYl 






JMP .-2 






XIT TYT 






a'YEXIT 




/TELETYPE 
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/TYPEWRITER INITIALIZE 




TIN=JMS . 




DAC TYSVAC 
LAC OCL 
DAC OCS 

703301 
SKP 

JMP . 3 
TTS 





T'llIP 



fIBRARY I 



Digil-al-7-lO-O 

JMS OTY ''°9^ ^ 

LAC TYSVAC 

TCR 

JMP I TIN-JMS 
/TYPE THE DIGIT IN THE AC 
TDIGIT=JMS . 



DAC TEiyiY-1 

AND (17 

ADD (LAC NCT 

DAC . 1 

XX 

TYl 

LAC TEMYi 

JMP TDIGIT-JMS 
/TYPE A STRING OF CHARACTERS 
TSR*JMS . 



DAC T">EMY1 

LAC I TEiyrYl 

TY3 

AND (76 

ISZ TE^^l 

SZA 

JMP TSR+2-JMS 

LAC TEMYl 

JMP I TSR-JMS 
/EXIT AFTER RESTORING AC AND LINK 

TYEXIT JMP . 

DAC TEMY 

RAL 

LAC TYSVAC 

JMP I TEMY 
/TELETYPE OUTPUT PACKAGE - PAGE 4 
/ROTATE LEFT 6 
RL6, 

RTL 

RTL 

RTL 

JMP I RL6 
/TABLE OF DIGITS 
NCT, 33 73 63 41 25 

3 53 71 31 7 
/CASE STORAGE 
OCU, 33 
OCL, 37 
OCS, 
/END OF TELETYPE OUTPUT PACKAGE 
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/PDP-V7 ADDENDUM 
TYIB, 



TYID, 
TYIC, 



TCRA, 



ADD (LAC BTATAB-1 

DAC . 1 

XX 

SZL 

JMP TYIC 

JMS OTY 

JMP Ty2-1 

JMS RL6 

RTL 

RTL 

JMP TYID 

LAW 215 

JMS OTY 

LAW 212 

JMP TCR-JMS 10 
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BTATAB, 



START 



265324 /5,T 
215215 

271317 
240240 
243310 
254316 

256315 
212212 

251314 
264322 
246307 

270311 
260320 
272303 
273326 
263305 

242332 
244304 
277302 
211323 
266331 
241306 
257330 
255301 
262327 
247312 

377377 
267325 
261321 

250313 
377377 



/CARRIAGE RETURN 

/9,0 

/SPACE 

/x,H 

A,N 

/.,M 

/LINE FEED 

/),L 

/4,R 

/+,G 

/8,I 

/0,P 

/:,C 

A.V 

/$,Z 
/oD 
/?,B 
/BiEJjJjj S 
/6,Y 

/Ax 

/-,A 
/2,W 

/^.J 

/FIGURES 

/7.U 

/1,Q 
/(.K 
/LETTERS 
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